10 REM COLOR SWITCH
20 REM BY S.F. DIRSCHAUER
30 L=828:CL=L+3
40 FOR I=LTOL+21:READA:POKEI,A:NEXT
50 DATA 160,0,169,0,153,0,216,153,250
60 DATA 216,153,244,217,153,238,218
70 DATA 200,192,251,208,239,96